LD	M9038
SET	Y10

LD	X1
RST	Y10
SET	Y11
SET	M100

LD	M100
ANI	X1
SET	Y10

END